program RApteka;

uses
  Forms,
  SysUtils,
  main in 'main.pas' {fmMain},
  DataModule in 'DataModule.pas' {dmData: TDataModule},
  settings in 'settings.pas' {fmSettings};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TdmData, dmData);
  Application.CreateForm(TfmMain, fmMain);
  Application.CreateForm(TfmSettings, fmSettings);
  DecimalSeparator := '.';
  Application.Run;
end.
